home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1996 April / Macworld (1996-04).dmg / Educational Demos / Goldilocks Gamebook / Goldilocks.DIR / 00158_Script_158 < prev    next >
Text File  |  1995-11-20  |  529b  |  26 lines

  1. -- tree
  2.  
  3. on mouseDown 
  4.   global currentColor,p3
  5.   puppetSound "Click.AIF"
  6.   puppetSprite 4, true
  7.   if currentColor = "red" then
  8.     set the castNum of sprite 4 to 63
  9.     put 0 into p3
  10.   end if
  11.   if currentColor = "blu" then
  12.     set the castNum of sprite 4 to 64
  13.     put 0 into p3
  14.   end if
  15.   if currentColor = "bro" then
  16.     set the castNum of sprite 4 to 65    
  17.     put 0 into p3
  18.   end if
  19.   if currentColor = "gre" then
  20.     set the castNum of sprite 4 to 66
  21.     put 1 into p3
  22.   end if
  23.   updateStage
  24. end
  25.  
  26.